home *** CD-ROM | disk | FTP | other *** search
- object FormBloqueoServicios: TFormBloqueoServicios
- Tag = 65700
- Left = 306
- Top = 191
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsSingle
- Caption = 'Bloqueo de servicios'
- ClientHeight = 384
- ClientWidth = 424
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label20: TLabel
- Tag = 65700
- Left = 14
- Top = 13
- Width = 98
- Height = 13
- Caption = 'Bloqueo de servicios'
- end
- object PandaBrown14: TPandaBrown
- Left = 14
- Top = 34
- Width = 32
- Height = 32
- TheBrown.Data = {
- 76020000424D7602000000000000760000002800000020000000200000000100
- 04000000000000020000120B0000120B00001000000000000000FFFFFF0000FF
- FF00FF00FF000000FF00C0C0C00080808000008080008000800000008000FFFF
- 000000FF00008080000000800000FF0000008000000000000000222222222822
- 22FFFFFF222222222222222222253385FFEEEEEEFFF222222223222222233388
- FEEEEEEEEEEFF22222232222222333388EDEEDEEEEEEEF222222222222233433
- 37EDEEEEEEEEEEF2235222222256301338EEDEDEEEEEEEFF53522222256C6311
- 38EDDDEDEFEEFFC63222222225C6C6344387DEDEFCFFCC63822222225CACCB73
- 4338DDECCCCCC6388F2222225ACCBDD63338DDDCCAA65388CF2222225ACCBBCA
- 63338EDECCA638C4CF222225ACC9BCAAA63387EDEC6386CCCCF222250ACBBAAC
- CB73338ED7386AAC4CF22225ACB9BBCCDBB73338838CA6A6CCF22225CB9B9BBD
- BBDB783338ECCCCACCF22555555555555DBDB73388EEEECAACF2FFFFFFFFFFFF
- F55B7338338EDEC66AF21111111111111F57338E7737EEBCAFF211111FF11111
- 4F73387BDB388EEECF2261111FF11111F53387BDBDB738EECF22611111111114
- F338EDDBDDDD738EF22226111FF1111F5388CBDDBBDDE788F22226111FF1114F
- 388CCDBDBDBDDE33822222611FF111F586CCDBDBDBDBDDF5532222611FF114F8
- 8CCCBDBDBDBDDF22235222261FF11F56AACCDCCDDBDFF2222222222611114F25
- 556CCCCCFFF22222222222226111F5222255555522222222222222226114F222
- 222222222222222222222222261F5222222222222222222222222222261F2222
- 2222222222222222222222222262222222222222222222222222}
- end
- object Label21: TLabel
- Tag = 65800
- Left = 58
- Top = 34
- Width = 349
- Height = 31
- AutoSize = False
- Caption = 'Indica los servicios a los que deseas impedir el acceso.'
- WordWrap = True
- end
- object Bevel17: TBevel
- Left = 122
- Top = 20
- Width = 283
- Height = 9
- Shape = bsTopLine
- end
- object LVServicios: TListView
- Tag = 66800
- Left = 58
- Top = 80
- Width = 347
- Height = 221
- HelpContext = 52
- Columns = <
- item
- Caption = 'Servicio'
- Width = 100
- end
- item
- Caption = 'Puerto'
- end
- item
- Caption = 'Descripci�n'
- Width = 180
- end>
- ReadOnly = True
- HideSelection = False
- Checkboxes = True
- RowSelect = True
- TabOrder = 0
- ViewStyle = vsReport
- end
- object ButtonAceptar: TButton
- Tag = 2200
- Left = 214
- Top = 353
- Width = 90
- Height = 22
- Caption = '&Aceptar'
- Default = True
- ModalResult = 1
- TabOrder = 1
- OnClick = ButtonAceptarClick
- end
- object ButtonCancel: TButton
- Tag = 2400
- Left = 316
- Top = 353
- Width = 90
- Height = 22
- Cancel = True
- Caption = '&Cancelar'
- ModalResult = 2
- TabOrder = 2
- end
- object CBPreguntar: TCheckBox
- Tag = 66600
- Left = 58
- Top = 314
- Width = 347
- Height = 17
- HelpContext = 53
- Caption = 'Preguntar por acci�n a realizar en caso de bloqueo'
- TabOrder = 3
- end
- object ManuForm1: TManuForm
- Enabled = False
- TitleBar.ApplicationInfo.FontStyle = [fsBold]
- TitleBar.Color = clMaroon
- TitleBar.CompanyInfo.FontStyle = [fsBold, fsItalic]
- TitleBar.NbOfColors = 0
- Left = 366
- Top = 4
- end
- end
-